home *** CD-ROM | disk | FTP | other *** search
/ Atari Mega Archive 1 / Atari Mega Archive - Volume 1.iso / cli / gulam.arc / examples.arc / GULAM.G < prev    next >
Text File  |  1989-01-09  |  3KB  |  117 lines
  1.  
  2. # GULAM shell - adapted to meet my needs.
  3. # Adapt it to suit yourself.
  4.  
  5. #-----------------------------------------------------------------------------
  6. msoff    # turn mouse off
  7. # set some variables
  8.     set    dir_cache 1
  9.     set    verbosity 0
  10.     set history 200
  11.  
  12. #-----------------------------------------------------------------------------
  13. # my prompt
  14.     setenv    STACK "%$STACK"
  15.     setenv    STACK "%"
  16.     set    prompt    'AtariST $cwd $ncmd $STACK'
  17.     set    prompt_tail    ' '
  18.  
  19. #-----------------------------------------------------------------------------
  20. # communications
  21.     set    baud_rate    1200
  22.     set    rx_remote_cmd    'public xmodem st'
  23.     set    sx_remote_cmd    'public xmodem rt'
  24.     set    histfile    d:\gu_hist
  25.  
  26. #-----------------------------------------------------------------------------
  27. # set some aliases _____-------------------------------------------------------
  28. alias    hi    history
  29. alias    pu    pushd
  30. alias    po    popd
  31.  
  32. alias    rm    rm -i
  33. alias    Rm    rm
  34.  
  35. alias    uni    'gem d:\uniterm.prg'
  36. alias    apl    'gem d:\apl.prg'
  37.  
  38. alias    term    exit
  39. alias    quit    exit
  40. alias    logout    exit
  41. alias    lo    exit    
  42.  
  43. alias    j    echo "No jobs."
  44. alias    x    ue
  45. alias    lc    'ls -F'
  46. alias    ll    'ls -ltF'
  47.  
  48. alias    init    'ls a:  > d:\junk ; rm d:\junk '
  49.  
  50. alias    aa    'set aa $cwd '
  51. alias    stash    'cp +t $* $aa '
  52.  
  53. alias    free    'df a d'
  54.  
  55. #-----------------------------------------------------------------------------
  56. # for the printer...
  57. # the following sets tabs on PMs Epson MX-80
  58. #    pr_bof: send before printing each new file.
  59.     set pr_bof '①033①D①010①020①030①040①050①060①070①033①C①102'
  60.     set pr_bof ' '
  61.  
  62. #    pr_eol: send after each line.
  63.     set pr_eol '①r①n'
  64.  
  65. #    pr_eop: send after each page (214 == ASCII ^L + 0200).
  66.     set pr_eop '①214①n'
  67.     set pr_eop ' '
  68.  
  69. #    pr_eof: send after the end of file.
  70.     set pr_eof '①214'
  71.     set pr_eof ' '
  72.  
  73. # two aliases
  74. set    t    d:\more14.ttp
  75. if { -e $t }
  76.     alias    l    $t
  77.     alias    p    $t
  78. ef
  79.     alias    l    more
  80.     alias    p    more
  81. endif
  82.  
  83. # -----------------------------------------------------------------------------
  84. set    t    d:\head.prg
  85. if { -e $t }
  86.     alias    tail    $t -t
  87.     alias    string    $t -s
  88. ef
  89.     alias    tail    more
  90.     alias    string    more
  91. endif
  92.  
  93. set    t    d:\lv.tos
  94. if { -e $t }
  95.     alias    vi    $t
  96. endif
  97. unset t
  98.  
  99. #-----------------------------------------------------------------------------
  100. # set for finding commands.
  101. # this causes an implicit "rehash"
  102.     set    path    d:\,a:\
  103.     set    PATH    $path
  104.  
  105. #-----------------------------------------------------------------------------
  106. # I like a sub-directory in ram disk.
  107. set     t     d:\jj
  108. if { -e $t }
  109.     echo dir $t exists
  110. ef
  111.     mkdir $t
  112.     echo Create directory $t
  113. endif
  114. unset t
  115. #                     --- === EOF === ---
  116.  
  117.